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Appendix A 

#include <analysis.h> 
#include <ansi_c.h> 



double g_dPressureCalc (doiible[], double [], double ); 

double g_dPressureCalc (double dlntensity[] , double dCoef Array [] , double dTemperat 
{ 

int count , 
i; 

double * loc, 

* amp, 

* deriv, 
dPressure, 
TopHalf [1024] ; 



// Get Spectral Power density 



yl for (i = 0; i<1024 ; i++) TopHalf [i] - dlntensity[1024 + i] ; 
fll Spectrum {TopHalf, 1024); 
// Find the peak 

S PeakDetector (TopHalf + 8, 100, 50.0, 3, 0, 1, 1, Sccount, Siloc, 

Scamp, &deriv) ; 

J: if (count < 1 ) return (double) count; 

%.J 11 Calculate the pressure 
/|^i>olynomial Regression for CT2 0U15__C; 
//Y = A + B1*X + B2*X^2 + B3*X^3 

//Parameter Value Error 

// 

//A 17.62138 0.31925 

//HI -0.50365 0.04074 

//B2 0.01343 0.00165 

//B3 -3.22463E-4 2.14632E~5 

// 

// dPressure = 17.62138 - 0.50365 * loc [0] + 0 . 01343 *loc [0] *loc [0 ] - 3.22463E- 
4*loc [0] *loc [0] *loc [0] ; 

dPressure = dCoef Array [0] + 

dCoefArray [1] * loc[0] + 

dCoefArray [2] * loc [0] *loc [0] + 

dCoefArray [3] * loc [0] *loc [0] *loc [0] ; 

// Apply temperature correction 
//Linear Regression for DATA11_B: 
//Y = A + B * X 
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//Parameter Value Error 

// 

//A -1.39373 0.03399 
//B 0.07041 7.93589E-4 



dPressure = dPressure + dTemperature * dCoef Array [5] + dCoefArray[4] ; 
return (dPressure) ; 

} 
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